RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 
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' 
; Version: *v04-000' 


ASSESS SEITE SST ST TTT Te rere errr TTT TTT TIT TTT TIT T ITI TILT T TT ITILiLiTiLitiit 


:* COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
!* ALL RIGHTS RESERVED. 


:* THIS SOFTWARE 4 FURNISHED UNDER A LICENSE AND MAY BE USED AND corite 
:* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AN 7 eee THE 
:* INCLUSION OF THe ABOVE Spd hd NOTICE. THIS SOFTWARE OR OTHER 
ie COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
. Fuansrenneee NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 
* D. 


ie THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
. CORPORAT ine NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


ie DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


#2 eee eee eee eee ea ea eRe 


i eeeererenrereerererrerereereererteeeerereerceneteeeenerereereereereerereetee 
' 

tee 

FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 


ABSTRACT: 
Definitions pertaining to Lists of numbers picked up by GLNM. 


ENVIRONMENT: Transportable BLISS 


AUTHOR : Rich Friday 
CREATION DATE: 1978 
MODIFIED BY: 
002 KAD00002 Keith Dawson 07-Mar-1983 


Global edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS (library. 


LITERAL 
NMLST__COUNT = 1, 'The number of numbers found. 
NMLST~~ VALUE - ¢: ‘The values of the numbers, 
NMLST__DESCR = 3; ‘what the numbers Looked Like. 
LITERA 
NMLST_MAXSIZE = 40; 


STRUCTURE 


j 
_ 
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NUMBER_LISTCI ,Attribute;Length=NMLST_MAXSIZE] = 


CRUPVAL*( 2*length + 1 )J 
(If Attribute eql NMLST__COUNT 


then 
NUMBER_LIST 
else 
(NUMBER_LIST + ZUPVAL*1 + 
Cif Attribute eql NMLST__VALUE 
then XUPVAL*(I = 1) 
else ZUPVAL*(I = 1 + Length) ))); 


: Names for NMLST_DESCRIPT things. 


LITERAL 
NULL = 0, ! No number given. 
NM_UNSIGNED = 1, ! Number was unsigned. 
NM_PLUS = ¢- ! A *+* preceeded the number. 
NM_MINUS = 3, ! A ‘=" preceeded the number. 
BAD = 4; ! The number was in error. 
MACRO 
NMLST_COUNT = NMLST CO,NMLST__COUNTIJ2, 
NMLST_VALUE (1) = NMLST CI,NMLST__VALUEJ2, 
NMLST_DESCR (1) = NMLST CI,NMLST__DESCRI2; 


: End of NMLST.REQ 
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